home *** CD-ROM | disk | FTP | other *** search
- object MainForm: TMainForm
- Left = 30
- Top = 118
- Width = 676
- Height = 378
- ActiveControl = StatusLine
- Caption = 'SRW Example'
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = []
- FormStyle = fsMDIForm
- Menu = MainMenu1
- PixelsPerInch = 96
- Position = poDefault
- WindowState = wsMaximized
- WindowMenu = Window1
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- TextHeight = 16
- object Panel1: TPanel
- Left = 0
- Top = 306
- Width = 668
- Height = 26
- Align = alBottom
- BorderWidth = 1
- TabOrder = 0
- object StatusLine: TPanel
- Left = 2
- Top = 2
- Width = 603
- Height = 22
- Align = alClient
- Alignment = taLeftJustify
- BevelOuter = bvLowered
- BorderWidth = 1
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- end
- object Panel2: TPanel
- Left = 605
- Top = 2
- Width = 61
- Height = 22
- Align = alRight
- Alignment = taLeftJustify
- BevelOuter = bvLowered
- TabOrder = 1
- end
- end
- object SpeedPanel: TPanel
- Left = 0
- Top = 0
- Width = 668
- Height = 41
- Align = alTop
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- object cmdTasks: TBitBtn
- Left = 104
- Top = 0
- Width = 105
- Height = 41
- Hint = 'Load a saved report'
- Caption = '&Tasks'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- Glyph.Data = {
- 90020000424D9002000000000000760000002800000020000000200000000100
- 0400000000000002000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777777777777777777777777777777777777777777777777777777777777777
- 7777777777777777777777777777888888877778888888777777777777700000
- 0087770000000877777777777770999990877709999908777777777777709999
- 9087770999990877777777777770999990877709999908777777777777709999
- 9077770999990777777777777770000000777700000007777777777777777077
- 7777777770777777777777777777700000000000007777777777777777777777
- 7770777777777777777777888888877778808888777788888877700000008777
- 0000000877700000007770999990877709999908777099999077709999908777
- 0999990877709999907770999990877709999908777099999077709999907777
- 0999990777709999907770000000777700000007777000000077777770777777
- 7770777777777077777777777000000000000000000000777777777777777077
- 7777777777777777777777777788808888888777777777777777777700000000
- 0000877777777777777777770999999999908777777777777777777709999999
- 9990877777777777777777770999999999908777777777777777777709999999
- 9990777777777777777777770000000000007777777777777777777777777777
- 7777777777777777777777777777777777777777777777777777000000000000
- 0000000000000000000000000000000000000000}
- Style = bsNew
- end
- object cmdProjects: TBitBtn
- Left = 0
- Top = 0
- Width = 105
- Height = 41
- Hint = 'Store current report in a file'
- Caption = '&Projects'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- Glyph.Data = {
- 76020000424D7602000000000000760000002800000020000000200000000100
- 0400000000000000000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777000000777
- 777777777777777777777707FFF0000777777777777777777777707788880000
- 07777777777777777777707700880F0000777777777777777777077077F80FFF
- 0000777777777777777707707770FFFFF00007777777777777770777000FFF7F
- FFF0000777777777777708777700F7077FFF00000777777777777087777700F0
- 077F7700007777777777770088800FFFF00777770000000007777777000FFFFF
- FFF077700000000000077777770000FFF7770007BBBBBB770000777777777700
- 0700BBBBBBBBBBBBB70077777777777000BBBBBBBBBBBBBBBBB0777777777700
- BBBBBBBBB0000BBBBBB07777777770BB78000000000BB0BBBB70777777700000
- 7B7BBBBBBBBBB00BB70077777000BBBBBBBBBBBBBBBBBBB00000777700BBBBBB
- 0000000000BBB0BB0F007770BBBBB0007777777780BB0B0B0FF0770BBBB00777
- BBBBBBB080BB0BB00FF0770BB0077BBBBBBBBBB080BB0B807007770B077BBBBB
- BBBBBB080BB0BB00777777007BBBBBBBBBBBBB080BB0BB00777777770BBBBBBB
- BBBBB080BB0BB8077777777707BBBBBBBBBBB080BB0BB07777777777707BBBBB
- BBBB080BB0BB0777777777777700BBBBBBB080BB0BB077777777777777770777
- 77080BB0B0077777777777777777700000BBBB00077777777777777777777700
- BBBB007777777777777777777777777700007777777777777777}
- Style = bsNew
- end
- object cmdOrders: TBitBtn
- Left = 208
- Top = 0
- Width = 105
- Height = 41
- Hint = 'Clear current report'
- Caption = '&Orders'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- Glyph.Data = {
- 36080000424D3608000000000000360400002800000020000000200000000100
- 0800000000000000000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
- A600000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00070707070707
- 0707070707070707070707070707070707070707070707070707070707070707
- 0700000000000000000000000707070700000000000707070707070707070000
- 00FB03FB03FB03FB0303030300000000FBFB03FB03000707070707070700FB03
- FB03FB03FB03030303030303000300FBFB030300030300070707070700030303
- 0300000000000000000000000300FBFB00FB03FB030303000707070700030303
- 03FB07FB07030703030303000303FBFBFBFB0303030303000707070700000303
- 0303030303030303030300FB03FB03FBFB0303FB03FB03FB00070707000000FB
- 03FB03FB03030303030300FB03FB0303FB03FBFBFB03030300070700FB03FB03
- FB03FB03FB030303030300FB03FB030303FBFBFB030303FB0007000303030300
- 0000000000000000000000FB03FB0303FBFBFBFBFB03FB030007000300000000
- 00FB03FB03FB0303030300FB03FB030303FBFB00FB0303FB000700000300FB03
- FB03FB03FB03FB03030300FB03FB030303FBFBFBFB03FB030007000300030303
- 0303030303030303030300FB0303030303FBFBFB03FB03FB0007070000030000
- 00FB070707030703070300FBFB0303030303030303FBFB000707070700000303
- 030300000000000000000000FB0303FB03030303FBFB03000707070700030300
- 0000FB03FB03FB03FB03FB00FBFB0303030300FBFBFB000707070707070000FB
- 03FB03FB03FB03FB03FB03FB00FBFB0303FB03FBFB0007070707070707000303
- 030303030303030303030303030000FB03030303000707070707070707000300
- 0000FBFBFB070307030703070300000003000707070707070707070707000003
- 0303030307000000000000000000000000000707070707070707070707000303
- 0307000000FB03FB03FB03FB03FB03FB00000007070707070707070707070003
- 0300FB03FB03FB03FB03FB03FB03FB03FB030300070707070707070707070700
- 0003030303FFFFFFFFFFFF030303030303030303000707070707070707070707
- 0003000707FBFBFBFB03FB03FB03FB0300000003000707070707070707070707
- 00000303030303FBFBFBFBFB03FB03FB03030300000707070707070707070707
- 00030303FB03FB03FBFBFBFBFB03FB03FB030303000707070707070707070707
- 0700030303FB03FBFBFBFBFBFBFB030303030300070707070707070707070707
- 070700000003FB03FB03FBFFFFFFFFFB00000007070707070707070707070707
- 0707070707000000000000000000000007070707070707070707070707070707
- 0707070707070707070707070707070707070707070707070707070707070707
- 0707070707070707070707070707070707070707070707070707070707070707
- 0707070707070707070707070707070707070707070707070707}
- Style = bsNew
- end
- object cmdCharts: TBitBtn
- Left = 312
- Top = 0
- Width = 105
- Height = 41
- Hint = 'Select tables included in report'
- Caption = '&Charts'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- Glyph.Data = {
- 76020000424D7602000000000000760000002800000020000000200000000100
- 0400000000000000000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777777777777777777777777777777777777777777777777777777777777770
- 0000000007777777777777777777000B7B7B7B7B7000777777777777770007B7
- B7B7B7B7B7B7007777777777707E0B70000000000B7B7B077777777707E70007
- B7B7BBBBB000B7B0777777707E7E008B7B7BBBBBBBBB007007777707E7E70608
- B7B7BBBBBBBBBB005077770E7E7E08608B7BBBBBBBBB009090777707E700E086
- 08B7BBBB0000D9D05077770E70EEEE08608BB0009D9D9D90907777070EEEEEE0
- 860009D9D9D9D9D050777760EEEEEEEE08609D9D9D9D9D909077770EEEEEEEEE
- E080D9D9D9D9D9D05077770EEEEEEEEEEE009D9D9D9D9D909077770EEEEEEEEE
- EEE0D9D9D9D9D9D05077770EEEEEEEEEEEE09D9D9D9D9D909077770EEEEEEEEE
- EEE0D9D9D9D9D9D050777770EEEEEEEEEEE09D9D9D9D9D90907777770EEEEEEE
- EEE0D9D9D9D9D9D05077777770EEEEEEEEE09D9D9D9D0000907777777700EEEE
- EEE0D9D900005959007777777777000EEEE09000959595959077777777777770
- 0000095959595959507777777777777777770D95959595959077777777777777
- 777770D95959595907777777777777777777770D959595907777777777777777
- 77777770D95959077777777777777777777777770D9500777777777777777777
- 7777777770007777777777777777777777777777777777777777}
- Style = bsNew
- end
- object cmdSecurity: TBitBtn
- Left = 520
- Top = 0
- Width = 105
- Height = 41
- Hint = 'Change report settings'
- Caption = '&Security'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- Glyph.Data = {
- 90020000424D9002000000000000760000002800000020000000200000000100
- 0400000000000002000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777777777777777777777777777777777777777777777777777777777777777
- 7777777777777777777777777777777777777777777878777777777777777777
- 7777777787838387877777777777777777777778383838383877777787777787
- 8787778383838383838777783878783838387778383838383877778383838383
- 8383878383838387838778383838383838383838383838777838838383838383
- 8383838383838777778378383838383838383838383838777838778787878787
- 8783878383838387838777777777777777787778383838383877777777777777
- 7787778380000000838777777777777777777778008B8B800877777777777777
- 77777770B8B8B8B8B0777777007770000700770B8B8B8B8B8B07777088000888
- 80080708B8B8B8B8B8077700000000000000008B8B8B8B000B8070B8B8B8B8B8
- B8B8B8B8B8B8B07770B00B8B8B8B8B8B8B8B8B8B8B8B807770800BBBBBBBBBBB
- BBB8B8B8B8B8B08880B0700000000000000B008B8B8B8B000B80777777777777
- 770B0708B8B8B8B8B8077777777777777700770B8B8B8B8B8B07777777777777
- 77777770B8B8B8B8B07777777777777777777777008B8B800777777777777777
- 7777777777000007777777777777777777777777777777777777777777777777
- 7777777777777777777777777777777777777777777777777777000000000000
- 0000000000000000000000000000000000000000}
- Style = bsNew
- end
- object cmdReports: TBitBtn
- Left = 416
- Top = 0
- Width = 105
- Height = 41
- Hint = 'Select tables included in report'
- Caption = '&Reports'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 5
- OnClick = cmdReportsClick
- Glyph.Data = {
- 90020000424D9002000000000000760000002800000020000000200000000100
- 0400000000000002000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7788877777777777777777777777777788888887777777777777777777777788
- 8888888887777777777777777777888888888888888777777777777777888888
- 8888888888888777777777778888888888999888888888777777778888888888
- 9999999888888888777788888888889999999999988888888877777778889999
- 9999999999988877777777777799999999999999999997777777777799999999
- 9999999999999997777777999999999999999999999999999777999999999999
- 9999999999999999999777777777999999999999999777777777777777777999
- 9999999999777777777777788888899999999999998888888888778888888899
- 999999999888888888887000000000099999999900000000008870FFF8FFF8FF
- 9999999FF8FFF8FFF08870FFF8FFF8FFF99999FFF8FFF8FFF08870FFF8FFF8FF
- F99999FFF8FFF8FFF08870FFF8FFF8FFF89998FFF8FFF8FFF08870FFF8FFF8FF
- F8F9F8FFF8FFF8FFF08870FFF8FFF8FFF8FFF8FFF8FFF8FFF08870FFF8FFF8FF
- F8FFF8FFF8FFF8FFF08870FFF8FFF8FFF8FFF8FFF8FFF8FFF08870FFF8FFF8FF
- F8FFF8FFF8FFF8FFF08870CCC8CCC8CCC8CCC8CCC8CCC8CCC08870CCC8CCC8CC
- C8CCC8CCC8CCC8CCC08870CCC8CCC8CCC8CCC8CCC8CCC8CCC087700000000000
- 0000000000000000007777777777777777777777777777777777000000000000
- 0000000000000000000000000000000000000000}
- Style = bsNew
- end
- end
- object panLogo: TPanel
- Left = 40
- Top = 56
- Width = 553
- Height = 177
- BevelOuter = bvNone
- TabOrder = 2
- object labName2: TLabel
- Left = 48
- Top = 9
- Width = 497
- Height = 54
- Caption = 'Shazam Report Wizard'
- Font.Color = clGray
- Font.Height = -48
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- Transparent = True
- end
- object labDirections: TLabel
- Left = 40
- Top = 105
- Width = 505
- Height = 64
- AutoSize = False
- Caption =
- 'This project demonstrates adding Shazam Report Wizard to existin' +
- 'g projects. The MDI shell was generated by Delphi, and its defa' +
- 'ult toolbar replaced. Press the [Reports] button to display Sha' +
- 'zam Report Wizard.'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- WordWrap = True
- end
- object labName1: TLabel
- Left = 44
- Top = 8
- Width = 497
- Height = 54
- Caption = 'Shazam Report Wizard'
- Font.Color = clBlue
- Font.Height = -48
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- Transparent = True
- end
- object labTM: TLabel
- Left = 520
- Top = 16
- Width = 14
- Height = 14
- Caption = 'TM'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object labCopyright: TLabel
- Left = 40
- Top = 72
- Width = 497
- Height = 16
- Alignment = taCenter
- AutoSize = False
- Caption =
- 'Copyright (c) 1995 ShazamWare Solutions, Inc. All Rights Reserv' +
- 'ed.'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- end
- object MainMenu1: TMainMenu
- Left = 4
- Top = 156
- object File1: TMenuItem
- Caption = '&File'
- Hint = 'File related commands'
- object FileNewItem: TMenuItem
- Caption = '&New'
- Hint = 'Create a new file'
- OnClick = FileNewItemClick
- end
- object FileOpenItem: TMenuItem
- Caption = '&Open'
- Hint = 'Open an existing file'
- OnClick = FileOpenItemClick
- end
- object FileCloseItem: TMenuItem
- Caption = '&Close'
- Hint = 'Close current file'
- OnClick = FileCloseItemClick
- end
- object FileSaveItem: TMenuItem
- Caption = '&Save'
- Hint = 'Save current file'
- OnClick = FileSaveItemClick
- end
- object FileSaveAsItem: TMenuItem
- Caption = 'Save &As...'
- Hint = 'Save current file as...'
- OnClick = FileSaveAsItemClick
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object FileExitItem: TMenuItem
- Caption = 'E&xit'
- Hint = 'Exit the application'
- OnClick = FileExitItemClick
- end
- end
- object Edit1: TMenuItem
- Caption = '&Edit'
- object CutItem: TMenuItem
- Caption = 'Cu&t'
- Hint = 'Cut to clipboard'
- OnClick = CutItemClick
- end
- object CopyItem: TMenuItem
- Caption = '&Copy'
- Hint = 'Copy to clipboard'
- OnClick = CopyItemClick
- end
- object PasteItem: TMenuItem
- Caption = '&Paste'
- Hint = 'Paste from clipboard'
- OnClick = PasteItemClick
- end
- end
- object Window1: TMenuItem
- Caption = '&Window'
- Hint = 'Window related commands such as Tile and Cascade'
- object WindowCascadeItem: TMenuItem
- Caption = '&Cascade'
- Hint = 'Arrange windows to overlap'
- OnClick = WindowCascadeItemClick
- end
- object WindowTileItem: TMenuItem
- Caption = '&Tile'
- Hint = 'Arrange windows without overlap'
- OnClick = WindowTileItemClick
- end
- object WindowArrangeItem: TMenuItem
- Caption = '&Arrange Icons'
- Hint = 'Arrange window icons at bottom of main window'
- OnClick = WindowArrangeItemClick
- end
- object WindowMinimizeItem: TMenuItem
- Caption = '&Minimize All'
- Hint = 'Minimize all windows'
- OnClick = WindowMinimizeItemClick
- end
- end
- object Help1: TMenuItem
- Caption = '&Help'
- Hint = 'Help topics'
- object HelpAboutItem: TMenuItem
- Caption = '&About'
- end
- end
- end
- object OpenDialog: TOpenDialog
- Filter = 'All files (*.*)|*.*'
- Left = 4
- Top = 124
- end
- end
-